home *** CD-ROM | disk | FTP | other *** search
-
- /*
- * Computer Algebra Kit (c) 1992,98 by Comp.Alg.Objects. All Rights Reserved.
- * $Id: integer.h,v 1.1.1.1 1999/03/22 21:48:43 stes Exp $
- */
-
- #ifndef __CAINTEGER_HEADER__
- #define __CAINTEGER_HEADER__
-
- #include "cobject.h"
-
- #define BigInt Integer
-
- typedef struct bigint {
- int sign;
- int count;
- int capacity;
- void *digits;
- } *bigint_t;
-
- typedef unsigned short int DIGIT;
-
- @interface Integer : CAObject
- {
- struct bigint value;
- }
-
- + new;
- + str:(STR)aString;
- + int:(int)intValue;
- + factorial:(int)n;
- + fibonacci:(int)n;
- - copy;
- - deepCopy;
- - clear;
-
- - (unsigned) hash;
- - (BOOL) isEqual:b;
- - (int) numDigits;
- - (BOOL) isDigit;
-
- - insertDigit:(DIGIT)d;
- - (DIGIT) removeDigit;
-
- - (DIGIT) digitAt:(int)i;
- - (DIGIT) lastDigit;
- - (DIGIT) leadingDigit;
-
- - (STR) str;
- - str:(STR)aString;
-
- - asNumerical;
- - asModp:(unsigned short)p;
- - (DIGIT) digitValue;
- - digitValue:(DIGIT)aValue;
- - (unsigned long) ulongValue;
- - ulongValue:(unsigned long)aValue;
- - (int) intValue;
- - intValue:(int)aValue;
- - (double) doubleValue;
- - (float) floatValue;
-
- - (int) sign;
- - (int) compare:b;
-
- - zero;
- - (BOOL) isZero;
- - (BOOL) isOpposite:b;
- - negate;
- - double;
- - add:b;
- - subtract:b;
- - addDigit:(DIGIT)d;
- - subtractDigit:(DIGIT)d;
-
- - one;
- - minusOne;
- - (BOOL) isOne;
- - (BOOL) isMinusOne;
- - square;
- - multiply:b;
- - multiplyDigit:(DIGIT)d;
- - inverse;
-
- - divide:b;
- - divideDigit:(DIGIT)b;
- - quotientDigit:(DIGIT)b;
- - remainder:b quotient:(id *)q;
- - quotientDigit:(DIGIT)d remainder:(DIGIT *)r;
- - (DIGIT) remainderDigit:(DIGIT)d;
-
- - (BOOL) isEven;
- - (BOOL) isOdd;
-
- - gcd:b;
-
- - (BOOL) printsLeadingSign;
- - printOn:(IOD)aFile;
- @end
-
- #endif /* __CAINTEGER_HEADER__ */
-
-